home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 168 / 168.d81 / b.typing pool (.txt) < prev    next >
Commodore BASIC  |  2022-08-26  |  1KB  |  9 lines
  1. 10 restore:reada:bo=peek(66)*256+peek(65)+3:dv=peek(186):ifdv<8thendv=8
  2. 20 ce=bo+3:bl=bo+6:co=bo+9:sw=bo+12:c2=bo+15:dy=bo+18:sysbo:poke53272,23
  3. 50 sysce,16,"[212][160][217][160][208][160][201][160][206][160][199][160][160][160][208][160][207][160][207][160][204]":sysce,17,"[194]y [203]en [210]obinson
  4. 70 [158]ce,19,"(len) 1998 by mid$&asc (NULL)ublishing
  5. 80 sysce,20,"[212]his [208]rogram [201]sn't [208]ublic [196]omain
  6. 100 [143]
  7. 5000 [158]dy,"typing pool",dv
  8. 6000 [131]0
  9.